home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2.0 - Programmer's Utilities Power Pack / Delphi 2.0 Programmer's Utilities Power Pack.iso / a_to_d / dbplus2 / mainform.dfm / mainform.txt
Encoding:
Text File  |  1996-09-15  |  10.8 KB  |  471 lines
  1. object AppMainForm: TAppMainForm
  2.   Left = 191
  3.   Top = 94
  4.   ActiveControl = SpeedPanel
  5.   BorderStyle = bsSingle
  6.   Caption = 'TDBLookupCombo Plus - Check Designer'
  7.   ClientHeight = 395
  8.   ClientWidth = 483
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   Menu = MainMenu
  14.   PixelsPerInch = 96
  15.   OnCreate = FormCreate
  16.   OnShow = FormShow
  17.   TextHeight = 16
  18.   object StatusBar: TPanel
  19.     Left = 0
  20.     Top = 373
  21.     Width = 483
  22.     Height = 22
  23.     Align = alBottom
  24.     Alignment = taLeftJustify
  25.     BevelInner = bvLowered
  26.     Font.Color = clBlack
  27.     Font.Height = -11
  28.     Font.Name = 'MS Sans Serif'
  29.     Font.Style = []
  30.     ParentFont = False
  31.     TabOrder = 0
  32.   end
  33.   object SpeedPanel: TPanel
  34.     Left = 0
  35.     Top = 0
  36.     Width = 483
  37.     Height = 30
  38.     Align = alTop
  39.     ParentShowHint = False
  40.     ShowHint = True
  41.     TabOrder = 1
  42.     object ExitBtn: TSpeedButton
  43.       Left = 7
  44.       Top = 3
  45.       Width = 25
  46.       Height = 25
  47.       Hint = 'Exit|'
  48.       Glyph.Data = {
  49.         06020000424D0602000000000000760000002800000028000000140000000100
  50.         0400000000009001000000000000000000001000000000000000000000000000
  51.         80000080000000808000800000008000800080800000C0C0C000808080000000
  52.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777
  53.         777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333
  54.         33888888888888877F7F788888888888888F333FF88844444400888FFF444444
  55.         88888888888333888883333334D5007FFF433333333338F888F3338F33333333
  56.         345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8
  57.         78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF
  58.         FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F
  59.         3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333
  60.         3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333
  61.         345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8
  62.         F8FFFF8F33333333344444444443333333333888888888833333333333333333
  63.         3333333333333333FFFFFF333333333333300000033333333333333888888F33
  64.         333333333330AAAA0333333333333338FFFF8F33333333333330000003333333
  65.         33333338888883333333}
  66.       NumGlyphs = 2
  67.       OnClick = ExitItemClick
  68.     end
  69.   end
  70.   object Panel3: TPanel
  71.     Left = 0
  72.     Top = 30
  73.     Width = 483
  74.     Height = 165
  75.     Align = alTop
  76.     BevelOuter = bvNone
  77.     BorderStyle = bsSingle
  78.     Color = clSilver
  79.     Locked = True
  80.     TabOrder = 2
  81.     object Shape1: TShape
  82.       Left = 4
  83.       Top = 4
  84.       Width = 473
  85.       Height = 155
  86.       Brush.Style = bsClear
  87.       Pen.Color = clRed
  88.       Pen.Width = 2
  89.       Shape = stRoundRect
  90.     end
  91.     object Label1: TLabel
  92.       Left = 22
  93.       Top = 30
  94.       Width = 51
  95.       Height = 28
  96.       Caption = 'Pay to the Order of'
  97.       Font.Color = clBlack
  98.       Font.Height = -11
  99.       Font.Name = 'Arial'
  100.       Font.Style = []
  101.       ParentFont = False
  102.       WordWrap = True
  103.     end
  104.     object Label2: TLabel
  105.       Left = 350
  106.       Top = 15
  107.       Width = 26
  108.       Height = 14
  109.       Caption = 'Date'
  110.       Font.Color = clBlack
  111.       Font.Height = -11
  112.       Font.Name = 'Arial'
  113.       Font.Style = []
  114.       ParentFont = False
  115.       WordWrap = True
  116.     end
  117.     object Shape2: TShape
  118.       Left = 73
  119.       Top = 55
  120.       Width = 387
  121.       Height = 1
  122.       Visible = False
  123.     end
  124.     object Shape3: TShape
  125.       Left = 372
  126.       Top = 29
  127.       Width = 78
  128.       Height = 1
  129.       Visible = False
  130.     end
  131.     object Shape4: TShape
  132.       Left = 23
  133.       Top = 88
  134.       Width = 408
  135.       Height = 1
  136.     end
  137.     object Label5: TLabel
  138.       Left = 437
  139.       Top = 73
  140.       Width = 33
  141.       Height = 14
  142.       Caption = 'Dollars'
  143.       Font.Color = clBlack
  144.       Font.Height = -11
  145.       Font.Name = 'Arial'
  146.       Font.Style = []
  147.       ParentFont = False
  148.     end
  149.     object DBLookupComboPlus1: TDBLookupComboPlus
  150.       Left = 74
  151.       Top = 38
  152.       Width = 290
  153.       Height = 22
  154.       DataField = 'Company'
  155.       DataSource = DataSource1
  156.       LookupSource = DataSource2
  157.       LookupDisplay = 'Company;Contact'
  158.       LookupField = 'Company'
  159.       LookupIndex = 'ByCompany'
  160.       Style = csIncSrchEdit
  161.       Color = clBackground
  162.       Ctl3D = True
  163.       DropDownWidth = 350
  164.       Font.Color = clBlack
  165.       Font.Height = -12
  166.       Font.Name = 'Arial'
  167.       Font.Style = [fsBold]
  168.       ParentCtl3D = False
  169.       ParentFont = False
  170.       TabOrder = 0
  171.     end
  172.     object MaskEditDate: TMaskEdit
  173.       Left = 376
  174.       Top = 12
  175.       Width = 77
  176.       Height = 22
  177.       Color = clBackground
  178.       Ctl3D = True
  179.       EditMask = '!99/99/00;1; '
  180.       Font.Color = clBlack
  181.       Font.Height = -12
  182.       Font.Name = 'Arial'
  183.       Font.Style = [fsBold]
  184.       MaxLength = 8
  185.       ParentCtl3D = False
  186.       ParentFont = False
  187.       TabOrder = 1
  188.       Text = '03/15/95'
  189.     end
  190.     object MaskEditDollars: TMaskEdit
  191.       Left = 371
  192.       Top = 38
  193.       Width = 86
  194.       Height = 22
  195.       Color = clBackground
  196.       Ctl3D = True
  197.       EditMask = '!$ ccccccccc;0; '
  198.       Font.Color = clBlack
  199.       Font.Height = -12
  200.       Font.Name = 'Arial'
  201.       Font.Style = [fsBold]
  202.       MaxLength = 11
  203.       ParentCtl3D = False
  204.       ParentFont = False
  205.       TabOrder = 2
  206.       Text = '20.00'
  207.       OnExit = MaskEditDollarsExit
  208.     end
  209.     object EditWordDollars: TEdit
  210.       Left = 24
  211.       Top = 71
  212.       Width = 406
  213.       Height = 22
  214.       TabStop = False
  215.       Color = clBackground
  216.       Ctl3D = True
  217.       Font.Color = clBlack
  218.       Font.Height = -12
  219.       Font.Name = 'Arial'
  220.       Font.Style = [fsBold]
  221.       ParentCtl3D = False
  222.       ParentFont = False
  223.       ReadOnly = True
  224.       TabOrder = 3
  225.       Text = 'EditWordDollars'
  226.     end
  227.   end
  228.   object TPanel
  229.     Left = 0
  230.     Top = 197
  231.     Width = 483
  232.     Height = 176
  233.     Align = alBottom
  234.     Locked = True
  235.     TabOrder = 3
  236.     object Bevel1: TBevel
  237.       Left = 284
  238.       Top = 4
  239.       Width = 5
  240.       Height = 169
  241.     end
  242.     object Label3: TLabel
  243.       Left = 24
  244.       Top = 12
  245.       Width = 106
  246.       Height = 16
  247.       Caption = 'New Properties'
  248.       Color = clBtnFace
  249.       Font.Color = clBlue
  250.       Font.Height = -13
  251.       Font.Name = 'System'
  252.       Font.Style = [fsBold, fsItalic]
  253.       ParentColor = False
  254.       ParentFont = False
  255.     end
  256.     object Label4: TLabel
  257.       Left = 330
  258.       Top = 12
  259.       Width = 96
  260.       Height = 16
  261.       Caption = 'Fun && Games'
  262.       Font.Color = clBlue
  263.       Font.Height = -13
  264.       Font.Name = 'System'
  265.       Font.Style = [fsBold, fsItalic]
  266.       ParentFont = False
  267.     end
  268.     object RadioGroupStyle: TRadioGroup
  269.       Left = 150
  270.       Top = 1
  271.       Width = 132
  272.       Height = 75
  273.       Caption = 'Style'
  274.       Font.Color = clBlack
  275.       Font.Height = -11
  276.       Font.Name = 'Arial'
  277.       Font.Style = [fsBold]
  278.       ItemIndex = 3
  279.       Items.Strings = (
  280.         'csDropDown'
  281.         'csDropDownList'
  282.         'csIncSearch'
  283.         'csIncSrchEdit')
  284.       ParentFont = False
  285.       TabOrder = 3
  286.       OnClick = RadioGroupStyleClick
  287.     end
  288.     object RadioGroupSpeedButton: TRadioGroup
  289.       Left = 12
  290.       Top = 75
  291.       Width = 133
  292.       Height = 45
  293.       Caption = 'ShowSpeedButton'
  294.       Font.Color = clBlack
  295.       Font.Height = -11
  296.       Font.Name = 'Arial'
  297.       Font.Style = [fsBold]
  298.       ItemIndex = 0
  299.       Items.Strings = (
  300.         'True'
  301.         'False')
  302.       ParentFont = False
  303.       TabOrder = 1
  304.       OnClick = RadioGroupSpeedButtonClick
  305.     end
  306.     object RadioGroupBorderStyle: TRadioGroup
  307.       Left = 12
  308.       Top = 122
  309.       Width = 131
  310.       Height = 45
  311.       Caption = 'BorderStyle'
  312.       Font.Color = clBlack
  313.       Font.Height = -11
  314.       Font.Name = 'Arial'
  315.       Font.Style = [fsBold]
  316.       ItemIndex = 1
  317.       Items.Strings = (
  318.         'bsNone'
  319.         'bsSingle')
  320.       ParentFont = False
  321.       TabOrder = 2
  322.       OnClick = RadioGroupBorderStyleClick
  323.     end
  324.     object RadioGroupAutoDropDown: TRadioGroup
  325.       Left = 12
  326.       Top = 36
  327.       Width = 132
  328.       Height = 42
  329.       Caption = 'AutoDropDown'
  330.       Font.Color = clBlack
  331.       Font.Height = -11
  332.       Font.Name = 'Arial'
  333.       Font.Style = [fsBold]
  334.       ItemIndex = 0
  335.       Items.Strings = (
  336.         'True'
  337.         'False')
  338.       ParentFont = False
  339.       TabOrder = 0
  340.       OnClick = RadioGroupAutoDropDownClick
  341.     end
  342.     object RadioGroupDropDownAlign: TRadioGroup
  343.       Left = 151
  344.       Top = 76
  345.       Width = 132
  346.       Height = 45
  347.       Caption = 'DropDownAlign'
  348.       Font.Color = clBlack
  349.       Font.Height = -11
  350.       Font.Name = 'Arial'
  351.       Font.Style = [fsBold]
  352.       ItemIndex = 1
  353.       Items.Strings = (
  354.         'Left'
  355.         'Right')
  356.       ParentFont = False
  357.       TabOrder = 4
  358.       OnClick = RadioGroupDropDownAlignClick
  359.     end
  360.     object RadioGroupDropDownTop: TRadioGroup
  361.       Left = 150
  362.       Top = 121
  363.       Width = 131
  364.       Height = 45
  365.       Caption = 'DropDownTop'
  366.       Font.Color = clBlack
  367.       Font.Height = -11
  368.       Font.Name = 'Arial'
  369.       Font.Style = [fsBold]
  370.       ItemIndex = 1
  371.       Items.Strings = (
  372.         'Above'
  373.         'Below')
  374.       ParentFont = False
  375.       TabOrder = 5
  376.       OnClick = RadioGroupDropDownTopClick
  377.     end
  378.     object RadioGroupPreSets: TRadioGroup
  379.       Left = 300
  380.       Top = 32
  381.       Width = 163
  382.       Height = 61
  383.       Caption = 'Demo Pre-Sets'
  384.       ItemIndex = 0
  385.       Items.Strings = (
  386.         'Borland Default'
  387.         'Quicken Style')
  388.       TabOrder = 6
  389.       OnClick = RadioGroupPreSetsClick
  390.     end
  391.     object Button1: TButton
  392.       Left = 327
  393.       Top = 93
  394.       Width = 111
  395.       Height = 28
  396.       Caption = 'Check Color'
  397.       TabOrder = 7
  398.       TabStop = False
  399.       OnClick = Button1Click
  400.     end
  401.     object Button2: TButton
  402.       Left = 327
  403.       Top = 121
  404.       Width = 111
  405.       Height = 26
  406.       Caption = 'Border Color'
  407.       TabOrder = 8
  408.       TabStop = False
  409.       OnClick = Button2Click
  410.     end
  411.     object Button3: TButton
  412.       Left = 327
  413.       Top = 147
  414.       Width = 111
  415.       Height = 26
  416.       Caption = 'Field Color'
  417.       TabOrder = 9
  418.       TabStop = False
  419.       OnClick = Button3Click
  420.     end
  421.   end
  422.   object MainMenu: TMainMenu
  423.     Left = 322
  424.     object FileMenu: TMenuItem
  425.       Caption = '&File'
  426.       object N1: TMenuItem
  427.         Caption = '-'
  428.       end
  429.       object ExitItem: TMenuItem
  430.         Caption = 'E&xit'
  431.         Hint = 'Exit application'
  432.         OnClick = ExitItemClick
  433.         ShortCutText = 'Alt+X'
  434.       end
  435.     end
  436.     object Help1: TMenuItem
  437.       Caption = '&Help'
  438.       object About1: TMenuItem
  439.         Caption = '&About...'
  440.         OnClick = About1Click
  441.       end
  442.     end
  443.   end
  444.   object Table1: TTable
  445.     Active = True
  446.     DatabaseName = 'DBDEMOS'
  447.     TableName = 'CUSTOMER.DB'
  448.     Left = 353
  449.   end
  450.   object DataSource1: TDataSource
  451.     DataSet = Table1
  452.     Left = 383
  453.   end
  454.   object Table2: TTable
  455.     Active = True
  456.     DatabaseName = 'DBDEMOS'
  457.     IndexName = 'ByCompany'
  458.     TableName = 'CUSTOMER.DB'
  459.     Left = 415
  460.     Top = 2
  461.   end
  462.   object DataSource2: TDataSource
  463.     DataSet = Table2
  464.     Left = 447
  465.   end
  466.   object ColorDialog1: TColorDialog
  467.     Left = 270
  468.     Top = 2
  469.   end
  470. end
  471.